let (a, b, c) as foo = (1,2,3)

let 2 = match (1, 2) with
  | 1, 2 as foo -> foo
